﻿Public Class frmQuanLyTapHoa

    Private Sub ThêmToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ThêmToolStripMenuItem.Click
        Dim frmTH As New frmQuanLyHang
        frmTH.Show()
    End Sub

    Private Sub TìmKiếmNângCaoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TìmKiếmNângCaoToolStripMenuItem.Click
        Dim frmTK As New frmTimKiemNangCao
        frmTK.Show()
    End Sub

    Private Sub ThốngKêToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ThốngKêToolStripMenuItem.Click
        Dim frmTHK As New frmThongKe
        frmTHK.Show()
    End Sub

    Private Sub QuảnLýNhânViênToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles QuảnLýNhânViênToolStripMenuItem.Click
        Dim frmQLNV As New frmThongTinhNhanVien
        frmQLNV.Show()
    End Sub

    Private Sub SaoLưuKhôiPhụcToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaoLưuKhôiPhụcToolStripMenuItem.Click
        Dim frmSL As New frmSaoLuuKhoiPhuc
        frmSL.Show()
    End Sub
End Class